home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 701-725 / 704 / spclock / start.a68 < prev    next >
Text File  |  1995-03-18  |  957b  |  28 lines
  1. ;------------------------------------------------------------------------
  2. ;    This is a very minimal version of the startup code.
  3. ;    Also see the main, etc. in SPClock.c.
  4. ;    Note that this code is based on code provided by Manx, which is
  5. ;    Copyright (C) 1986,1987 by Manx Software Systems, Inc.
  6. ;-------------------------------------------------------------------------*/
  7.     entry    .begin
  8.     public    .begin
  9. .begin
  10.     far    data
  11.     lea    __H1_org+32766,a4    ; Point a4 toward the data segment
  12.     near data
  13. ; I didn't include the check for clearing the static data because
  14. ; I don't care if it is initialized to 0
  15.     move.l    sp,__savsp        ;save stack pointer
  16.     move.l    4,a6            ;get Exec's library base pointer
  17.     move.l    a6,_SysBase        ;and save it in a global variable
  18.     movem.l    d0/a0,-(sp)        ;save CLI command parameters
  19.     jsr    _main                ;start the program! 
  20.     add.w    #8,sp            ;pop args - we probably won't ever get here
  21.     rts                        ;and return
  22.  
  23.     public    _main
  24.  
  25.     dseg
  26.  
  27.     public    __savsp,_SysBase,__H1_org
  28.